Softdisk for Windows 38/Softdisk for Windows 38.iso/oilpro/OILPRO.EXE/OILPRO.DXR/00063.ls

Text File | 1997-08-20 | 910 b | 36 lines

on exitFrame
  global LIGHTCNT, UPG, LOADTHERE, BONUSROUND
  set LIGHTCNT to LIGHTCNT + 1
  puppetSprite(4, 1)
  if LIGHTCNT >= 4 then
    set LIGHTCNT to 1
  end if
  if LIGHTCNT = 1 then
    set the castNum of sprite 4 to cast "LIGHT1"
  end if
  if LIGHTCNT = 2 then
    set the castNum of sprite 4 to cast "LIGHT2"
  end if
  if LIGHTCNT = 3 then
    set the castNum of sprite 4 to cast "LIGHT3"
  end if
  updateStage()
  if rollOver(48) then
    set the castNum of sprite 48 to cast "RETURNBUTTON1"
  else
    set the castNum of sprite 48 to cast "RETURNBUTTON0"
  end if
  if rollOver(42) then
    set the castNum of sprite 42 to cast "SONDONBUT2"
  else
    set the castNum of sprite 42 to cast "SONDONBUT1"
  end if
  if rollOver(43) then
    set the castNum of sprite 43 to cast "SONDOFFBUT2"
  else
    set the castNum of sprite 43 to cast "SONDOFFBUT1"
  end if
  updateStage()
  go(the frame)
end